home *** CD-ROM | disk | FTP | other *** search
/ Hottest 6 / Hottest 6 (1996)(PDSoft)[!].iso / software / videoutils / a-g / ami2d / macros / nln2d.rexx < prev    next >
OS/2 REXX Batch file  |  1978-11-24  |  576b  |  31 lines
  1. /* macro to solve current model */
  2. options results
  3.  
  4. if ~show('ports', "NLN2D") then do
  5.     address command 'run ami2d:bin/nln2d'
  6.     do while ~show('ports', "NLN2D")
  7.     end
  8. end
  9.  
  10. address ami2d 'save(ram:temp.dat)'
  11.  
  12. address nln2d
  13.  
  14. 'read(ram:temp.dat)'
  15. call postmsg(0,11,"formkf -                  ",AMI2D)
  16. 'formkf'
  17. call postmsg(0,11,"formkf - done\"result,AMI2D)
  18. call postmsg(0,11,"solve -",AMI2D)
  19. 'solve'
  20. call postmsg(0,11,"solve - done\"result,AMI2D)
  21. 'save(ram:temp.dat)'
  22.  
  23. address ami2d 
  24.  
  25. 'read(ram:temp.dat)'
  26. 'plot'
  27. 'plot deform'
  28.  
  29. address command 'delete ram:temp.dat'
  30. exit
  31.